home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
EnigmA Amiga Run 1997 April
/
EnigmA AMIGA RUN 17 (1997)(G.R. Edizioni)(IT)[!][issue 1997-04][EAR-CD].iso
/
EARCD
/
text
/
edit
/
envstm20.lha
/
envSTM20
/
Install
< prev
next >
Wrap
Text File
|
1996-11-22
|
14KB
|
421 lines
; $VER: 1.0 All rights reserved.
(delopts "oknodelete" "force" "askuser")
(complete 0)
(if (exists "GOLDED:" (NOREQ))
(
(set vernum (getversion "golded:golded"))
(set ver (/ vernum 65536))
(set rev (- vernum (* ver 65536)))
(set version (+ (* 10 ver) rev))
(if (< version 44)
(
(message "\nSorry, GoldED 4.4.0 or better required")
(exit (quiet))
)
)
(message (cat "\n"
" \n"
"StormC mode for GoldED 4 \n"
" \n"
"©1996 Dietmar Eilert \n"
" All Rights Reserved. \n"
" \n"
" E-Mail: dietmar@tomate.tng.oche.de \n"
" \n"
"GoldED Release 4.4.0+ required. \n"
))
(if (= @language "deutsch")
(set language 1)
(set language 0)
)
(set language (askchoice
(prompt "\nStormC Menu\n")
(choices
"English"
"Deutsch"
)
(default language)
(help @askchoice-help)
))
(if (= language 1)
(
(set #install_api "API-Client installieren ?" )
(set #install_syntaxparser "Syntax-Parser installieren ?")
(set #install_syntax "Syntax-Parser" )
(set #install_syntax_storm "WarpStormC++" )
(set #install_syntax_warp "WarpC++" )
(set #install_syntax_standard "Standard" )
(set #install_syntax_none "Keiner" )
(set #install_syntax_help (cat "\n"
"Vorauswahl des Syntax-Parsers (zuständig für \n"
"die farbige Darstellung von Schlüsselworten): \n"
" \n"
"WarpStormC++ \n"
" \n"
" Komplexer konfigurierbarer C++-Parser. Er- \n"
" kennt und markiert C/C++-Befehle und Amiga- \n"
" typische Ausdrücke. Empfohlen für 68040 und \n"
" besser. Speicherverbrauch: hoch (Minimum: \n"
" 150 K). Relative Performance: 45% \n"
" \n"
"WarpC++ \n"
" \n"
" Schneller C++ Parser. Beschränkte Konfi- \n"
" gurierbarkeit. Erkennt C/C++-Befehle. \n"
" Empfohlen für 68030 oder besser. Speicher- \n"
" verbrauch: mittel. Relative Performance: \n"
" 60% \n"
" \n"
"Standard \n"
" \n"
" Einfacher Kommentar-Parser: Erkennt und \n"
" markiert C/C++-Kommentare im Quelltext. \n"
" Empfohlen für 68020 oder besser. Kein \n"
" nennenswerter Speicherverbrauch. Relative \n"
" Performance: 65% \n"
" \n"
"Keiner \n"
" \n"
" Keine farbliche Hervorhebungen im Text. \n"
" Empfohlen für 68000 oder besser. Relative \n"
" Performance: 100% \n"
))
(set #toolbar_style "\nBevorzugte Werkzeugleiste:\n")
(set #toolbar_style_4 "4 Farben")
(set #toolbar_style_8 "8+ Farben")
(set #toolbar_style_help (cat "\n"
" Beide Varianten können auf beliebigen Screens\n"
" verwendet werden. Der 4-Farb-Stil wurde für \n"
" vierfarbige Screen optimiert. Der 8-Farb-Stil\n"
" wurde für Screens mit acht oder mehr Farben \n"
" (optimal: 16 Farben) ausgelegt. \n"
))
)
(
(set #install_api "Install API client ?" )
(set #install_syntaxparser "Install syntax parser ?")
(set #install_syntax "Syntax parser" )
(set #install_syntax_storm "WarpStormC++" )
(set #install_syntax_warp "WarpC++" )
(set #install_syntax_standard "Standard" )
(set #install_syntax_none "None" )
(set #install_syntax_help (cat "\n"
"Preselection of syntax highlighting parser \n"
"(responsible for color-coded text): \n"
" \n"
"WarpStormC++ \n"
" \n"
" Complex configurable C++ parser. Highlights \n"
" C keywords and Amiga keywords. Recommended \n"
" for 68040 or better. RAM requirements: high \n"
" (150 K minimum). Relative performance: 45% \n"
" \n"
"WarpC++ \n"
" \n"
" Fast C++ parser. Limited configurability. \n"
" Highlights C++ keywords. Recommended for \n"
" 68030 or better. RAM requirements: medium. \n"
" Relative performance: 60% \n"
" \n"
"Standard \n"
" \n"
" Simple C++ comment parser. Highlights C/C++ \n"
" comments only. Recommended for 68020 or \n"
" better. RAM requirements: small. Relative \n"
" performance: 65% \n"
" \n"
"None \n"
" \n"
" No syntax highlighting. Recomended for \n"
" 68000 or better. Relative performance: 100% \n"
))
(set #toolbar_style "\nSelect preferred toolbar style:\n")
(set #toolbar_style_4 "4 colors")
(set #toolbar_style_8 "8+ colors")
(set #toolbar_style_help (cat "\n"
" Both styles can be used on all screens. The \n"
" 4 color style has been optimized for 4-color \n"
" screens. The 8+ style has been optimized for \n"
" screens with eight or more colors. \n"
))
)
)
(copylib
(prompt #install_api)
(source "api/mirror.api")
(dest "golded:api")
(confirm)
(help @copylib-help)
)
(
copylib
(prompt #install_api)
(source "api/quickinfo.api")
(dest "golded:api")
(confirm)
(help @copylib-help)
)
(set syntax 1)
(set syntax (askchoice
(prompt (cat "\n" #install_syntax "\n"))
(choices
#install_syntax_storm
#install_syntax_warp
#install_syntax_standard
#install_syntax_none
)
(default syntax)
(help #install_syntax_help)
))
(if (not (exists "golded:syntax"))
(makedir "golded:syntax")
)
(copylib
(prompt #install_syntaxparser)
(source "syntax/warpStormC++.parser")
(dest "golded:syntax")
(confirm)
(help @copylib-help)
)
(copylib
(prompt #install_syntaxparser)
(source "syntax/warpC++.parser")
(dest "golded:syntax")
(confirm)
(help @copylib-help)
)
(copylib
(prompt #install_syntaxparser)
(source "syntax/example_context.parser")
(dest "golded:syntax")
(confirm)
(help @copylib-help)
)
(if (not (exists "golded:syntax/warpStormC++.includes"))
(copyfiles
(source "syntax/warpStormC++.includes")
(dest "golded:syntax")
(nogauge)
)
)
(if (not (exists "golded:tools"))
(makedir "golded:tools")
)
; install registry editor (if not yet installed)
(if (not (exists "golded:tools/regedit"))
(makedir "golded:tools/regedit")
)
(copylib
(prompt "Install registry editor ?")
(source "bin/regedit" )
(dest "golded:tools/regedit")
(confirm)
(help @copylib-help)
)
; install manuals
(if (not (exists "golded:tools/stormc"))
(makedir "golded:tools/stormc")
)
(copyfiles
(source "stormc")
(dest "golded:tools/stormc")
(all)
(nogauge)
)
; install toolbar images
(if (exists "toolbar") (
(set hicolor
(askchoice
(prompt #toolbar_style)
(choices
#toolbar_style_4
#toolbar_style_8
)
(default 1)
(help #toolbar_style_help)
)
)
(if (not (exists "golded:toolbar"))
(makedir "golded:toolbar")
)
(if (not (exists "golded:toolbar/stormc"))
(makedir "golded:toolbar/stormc")
)
(copyfiles
(source "toolbar")
(dest "golded:toolbar")
(nogauge)
(all)
)
(if (= hicolor 1)
(copyfiles
(source "toolbar16")
(dest "golded:toolbar")
(nogauge)
(all)
)
)
))
; install macros
(if (not (exists "golded:arexx"))
(makedir "golded:arexx")
)
(copyfiles
(source "arexx")
(dest "golded:arexx")
(nogauge)
(all)
)
// create temporary directory
(if (not (exists "t:" (noreq)))
(
(if (not (exists "ram:t" (noreq)))
(makedir "ram:t")
)
(makeassign "t" "ram:t")
)
)
(copyfiles
(source "presets" )
(dest "t:" )
(pattern "stormc#?")
(nogauge)
)
(if (= language 0)
(copyfiles
(source "presets/e")
(dest "t:" )
(nogauge)
(all)
)
(copyfiles
(source "presets/d")
(dest "t:" )
(nogauge)
(all)
)
)
(if (= syntax 0) (copyfiles (nogauge) (source "presets/cpp/stormc_cpp_0.syntax") (dest "t:") (newname "stormc_cpp.syntax")))
(if (= syntax 1) (copyfiles (nogauge) (source "presets/cpp/stormc_cpp_1.syntax") (dest "t:") (newname "stormc_cpp.syntax")))
(if (= syntax 2) (copyfiles (nogauge) (source "presets/cpp/stormc_cpp_2.syntax") (dest "t:") (newname "stormc_cpp.syntax")))
(if (= syntax 3) (copyfiles (nogauge) (source "presets/cpp/stormc_cpp_3.syntax") (dest "t:") (newname "stormc_cpp.syntax")))
; update registry
(working "Updating registry...")
(run "golded:tools/regedit/regedit script=install.bat")
)
(message (cat "\n"
"Please install GoldED before attempting to\n"
"install this client. \n"
))
)
(exit (quiet))
(welcome)